<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% if Request.QueryString("id") <> "" then session("listingid") = Request.QueryString("id") end if %> <% Dim qry_listing__MMColParam qry_listing__MMColParam = "1" If (Session("listingid") <> "") Then qry_listing__MMColParam = Session("listingid") End If %> <% Dim qry_listing Dim qry_listing_numRows Set qry_listing = Server.CreateObject("ADODB.Recordset") qry_listing.ActiveConnection = MM_rvsdata_STRING qry_listing.Source = "SELECT * FROM properties WHERE id = " + Replace(qry_listing__MMColParam, "'", "''") + "" qry_listing.CursorType = 0 qry_listing.CursorLocation = 2 qry_listing.LockType = 1 qry_listing.Open() qry_listing_numRows = 0 %> <% Dim props__MMColParam props__MMColParam = "1" If (Request.QueryString("ID") <> "") Then props__MMColParam = Request.QueryString("ID") End If %> <% Dim props Dim props_numRows Set props = Server.CreateObject("ADODB.Recordset") props.ActiveConnection = MM_rvsdata_STRING props.Source = "SELECT * FROM properties WHERE ID = " + Replace(props__MMColParam, "'", "''") + "" props.CursorType = 0 props.CursorLocation = 2 props.LockType = 1 props.Open() props_numRows = 0 %> Elite Realty Florida - Miami Dade, Broward Real Estate
 


<%=(props.Fields.Item("address").Value)%>
, <%=(props.Fields.Item("city").Value)%>, <%=(props.Fields.Item("state").Value)%>
Priced at: <%= FormatCurrency((props.Fields.Item("price").Value), 0, -2, -2, -2) %>


<%=(props.Fields.Item("description").Value)%>


Style: <%=(props.Fields.Item("style").Value)%>
Bedrooms: <%=(props.Fields.Item("bedrooms").Value)%>
Square Feet: <%=(props.Fields.Item("squarefeet").Value)%>
Bathrooms: <%=(props.Fields.Item("bathrooms").Value)%>
Lot Size: <%=(props.Fields.Item("lotsize").Value)%>
Pool: <%=(props.Fields.Item("pool").Value)%>
Year Built: <%=(props.Fields.Item("yearbuilt").Value)%>
Spa: <%=(props.Fields.Item("spa").Value)%>

 

" class="linksmain">CONTACT ELITE REALTY ABOUT THIS PROPERTY
 

Copyright 2006 - EliteSouthFlorida.Com - All Rights Reserved

<% props.Close() Set props = Nothing %> <% qry_listing.Close() Set qry_listing = Nothing %>